Public Class frmDangNhap

    Private Sub ButtonDangNhap_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ButtonDangNhap.Click
        Dim frmMain As New frmMain
        Me.Hide()
        frmMain.ShowDialog()
        Me.Close()
    End Sub

    Private Sub ButtonThoat_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ButtonThoat.Click
        Me.Dispose()
    End Sub

    Private Sub ButtonCaiDatMayChu_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ButtonCaiDatMayChu.Click
        GroupBoxCaiDatMayChu.Visible = True
    End Sub
End Class